home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 004a / grammar2.zip / UPD2.BAT < prev    next >
DOS Batch File  |  1989-12-29  |  6KB  |  204 lines
  1. echo off
  2. REM  UPD2.BAT FOR CG 2.0  (December 1989)
  3. REM  Setup for specific WP
  4. echo %2 > CG.WPR 
  5. if not exist CG.WPR goto NOROOM
  6. REM WordPerfect 5.1 specific
  7. if %3. == 1. goto WPM51 
  8. REM WordPerfect 5.0 specific
  9. if %3. == 0. goto WPM50 
  10. REM WordPerfect 4.2 specific
  11. if %2. == 2. goto MAC4 
  12. REM WordStar Prof. specific
  13. if %2. == 3. goto WSP
  14. goto CHKSYS
  15. :WPM50
  16. PKXARC -r %1WP50 WPCG.EXE >nul
  17. PKXARC -r %1WP50 ALT?.CGM >nul
  18. PKXARC -r %1CG3 CGEMPTY.SUP >nul
  19. goto CHKWPM
  20. :WPM51
  21. PKXARC -r %1WP51 WPCG.EXE >nul
  22. PKXARC -r %1WP51 ALT?.CGM >nul
  23. PKXARC -r %1CG3 CGEMPTY.SUP >nul
  24. :CHKWPM
  25. REM
  26. REM  CHECK WP DIR FOR ALTC.WPM, ALTD.WPM, etc.
  27. REM     IF EXIST, NOTIFY THAT THEY WILL BE NAMED:  ALTC/D/E/F/G
  28. FOR %%X IN (ALTC.WPM, ALTD.WPM, ALTE.WPM, ALTF.WPM, ALTT.WPM) DO if exist %%X goto WPMMSG
  29. ren ALTC.CGM ALTC.WPM >nul
  30. ren ALTD.CGM ALTD.WPM >nul
  31. ren ALTE.CGM ALTE.WPM >nul
  32. ren ALTF.CGM ALTF.WPM >nul
  33. ren ALTT.CGM ALTT.WPM >nul
  34. goto CHKSYS
  35. :WPMMSG
  36. LOCATE 00,00
  37. copy CLS.BAT con >nul
  38. LOCATE 02,00
  39. REM  INFORM ABOUT MACROS
  40. :AGAIN2
  41. ECHO  ║
  42. ECHO  ║     Correct Grammar for WordPerfect uses the macros ALTC, ALTD,
  43. ECHO  ║     ALTE, ALTF and ALTT.  Some or all of these macros are 
  44. ECHO  ║     already defined in your WordPerfect subdirectory.  
  45. ECHO  ║
  46. ECHO  ║     This procedure will save your existing macros as ALT?.OLD
  47. ECHO  ║     and install the updated Correct Grammar macros.  
  48. ECHO  ║     
  49. ECHO  ║     OK to rename existing macros? 
  50. LOCATE 10,39
  51. GETYNCG
  52. :GETANS1
  53. IF ERRORLEVEL 3 GOTO AGAIN
  54. IF ERRORLEVEL 2 GOTO NOWPM
  55. ECHO Y
  56. :YESWPM
  57. if exist ALTC.OLD del ALTC.OLD >nul
  58. if exist ALTC.WPM ren ALTC.WPM ALTC.OLD >nul
  59. if exist ALTD.OLD del ALTD.OLD >nul
  60. if exist ALTD.WPM ren ALTD.WPM ALTD.OLD >nul
  61. if exist ALTE.OLD del ALTE.OLD >nul
  62. if exist ALTE.WPM ren ALTE.WPM ALTE.OLD >nul
  63. if exist ALTF.OLD del ALTF.OLD >nul
  64. if exist ALTF.WPM ren ALTF.WPM ALTF.OLD >nul
  65. if exist ALTT.OLD del ALTT.OLD >nul
  66. if exist ALTT.WPM ren ALTT.WPM ALTT.OLD >nul
  67. ren ALT?.CGM ALT?.WPM >nul
  68. goto CHKSYS
  69. :NOWPM
  70. ECHO  N
  71. LOCATE 00,00
  72. copy CLS.BAT con >nul
  73. LOCATE 02,00
  74. ECHO  ║     WARNING!
  75. ECHO  ║
  76. ECHO  ║     The Correct Grammar macro files which conflicted with your 
  77. ECHO  ║     previous macros will be copied as ALTC.CGM, ALTD.CGM, ALTE.CGM,
  78. ECHO  ║     ALTF.CGM and ALTT.CGM.  You will need to rename them to use 
  79. ECHO  ║     them with WordPerfect.
  80. ECHO  ║                                                                       ║
  81. ECHO  ║     Press any key to continue.                                        ║
  82. ECHO  ║                                                                       ║
  83. LOCATE 09,34
  84. pause >nul
  85. if exist ALTC.WPM goto YES5C
  86. ren ALTC.CGM ALTC.WPM >nul
  87. :YES5C
  88. if exist ALTD.WPM goto YES5D
  89. ren ALTD.CGM ALTD.WPM >nul
  90. :YES5D
  91. if exist ALTE.WPM goto YES5E
  92. ren ALTE.CGM ALTE.WPM >nul
  93. :YES5E
  94. if exist ALTT.WPM goto YES5T
  95. ren ALTT.CGM ALTT.WPM >nul
  96. :YES5T
  97. if exist ALTF.WPM goto CHKSYS
  98. ren ALTF.CGM ALTF.WPM >nul
  99. goto CHKSYS
  100. :MAC4
  101. PKXARC -r %1CG3.ARC CGEMPTY.SUP >nul
  102. PKXARC -r %1CG3 ALT?.CMC >nul
  103. REM
  104. REM  CHECK WP DIR FOR ALTC.MAC AND ALTD.MAC
  105. REM     IF EXIST, NOTIFY THAT THEY WILL BE NAMED:  ALTC/D.CMC
  106. FOR %%X IN (ALTC.MAC, ALTD.MAC) DO if exist %%X goto MACMSG
  107. ren ALTC.CMC ALTC.MAC >nul
  108. ren ALTD.CMC ALTD.MAC >nul
  109. goto CHKSYS
  110. :MACMSG
  111. LOCATE 00,00
  112. copy CLS.BAT con >nul
  113. LOCATE 02,00
  114. REM  INFORM ABOUT MACROS
  115. ECHO  ║
  116. ECHO  ║     Correct Grammar for WordPerfect uses the macros ALTC and ALTD.
  117. ECHO  ║     Some or all of these macros are already defined in your
  118. ECHO  ║     WordPerfect subdirectory.  
  119. ECHO  ║
  120. ECHO  ║     This procedure will save your existing macros as ALT?.OLD
  121. ECHO  ║     and install the updated Correct Grammar macros.  
  122. ECHO  ║     
  123. ECHO  ║     OK to rename existing macros? 
  124. LOCATE 10,39
  125. GETYNCG
  126. :GETANS2
  127. IF ERRORLEVEL 3 GOTO MACMSG
  128. IF ERRORLEVEL 2 GOTO NOMAC
  129. ECHO Y
  130. :YESMAC
  131. if exist ALTC.OLD del ALTC.OLD >nul
  132. if exist ALTC.MAC ren ALTC.MAC ALTC.OLD >nul
  133. if exist ALTD.OLD del ALTD.OLD >nul
  134. if exist ALTD.MAC ren ALTD.MAC ALTD.OLD >nul
  135. ren ALT?.CMC ALT?.MAC >nul
  136. goto CHKSYS
  137. :NOMAC
  138. ECHO N
  139. LOCATE 00,00
  140. copy CLS.BAT con >nul
  141. LOCATE 02,00
  142. ECHO  ║     WARNING!
  143. ECHO  ║
  144. ECHO  ║     The Correct Grammar macro files which conflicted with your 
  145. ECHO  ║     previous macros will be copied as ALTC.CMC and  ALTD.CMC.
  146. ECHO  ║     You will need to rename them to use them with WordPerfect.
  147. ECHO  ║                                                                       ║
  148. ECHO  ║     Press any key to continue.                                        ║
  149. ECHO  ║                                                                       ║
  150. LOCATE 08,34
  151. pause >nul
  152. if exist ALTC.MAC goto YES4C
  153. ren ALTC.CMC ALTC.MAC >nul
  154. :YES4C
  155. if exist ALTD.MAC goto CHKSYS
  156. ren ALTD.CMC ALTD.MAC >nul
  157. goto CHKSYS
  158. :WSP
  159. PKXARC -r %1CG3 WSCG.EXE >nul
  160. :CHKSYS
  161. if exist CGRM.SYS del CGRM.SYS >nul
  162. if exist CG2.SYS del CG2.SYS >nul
  163. LOCATE 00,00
  164. copy CLS.BAT con >nul
  165. LOCATE 02,00
  166. ECHO  ║
  167. ECHO  ║     The update is complete.  Please remove the Correct Grammar
  168. if exist %13 ECHO  ║     DISK 2 from your diskette drive and store all of your original
  169. if not exist %13 ECHO  ║     DISK 3 from your diskette drive and store all of your original
  170. ECHO  ║     diskettes in a safe place.
  171. ECHO  ║
  172. ECHO  ║     At the next screen, please enter your name.
  173. ECHO  ║  
  174. ECHO  ║     You will then be shown the file WHATSNEW.CG to explain 
  175. ECHO  ║     Correct Grammar's new features.
  176. ECHO  ║     
  177. LOCATE 13,07
  178. pause
  179. LOCATE 00,00
  180. copy CLS.BAT con >nul
  181. LOCATE 03,00
  182. ECHO  ║     Loading Correct Grammar ...
  183. CG WHATSNEW.CG -Z > nul
  184. goto DONE
  185. :NOROOM
  186. LOCATE 00,00
  187. copy CLS.BAT con >nul
  188. LOCATE 02,00
  189. ECHO  ║     Sorry, you are out of disk space.  The  Correct Grammar
  190. ECHO  ║     update is INCOMPLETE.  Please free up space on your hard 
  191. ECHO  ║     disk and try again.
  192. goto DONE
  193. :AGAIN
  194. cls
  195. %1LOCATE 00,00
  196. echo  ╔═══════════════════════════════════════════════════════════════════════╗
  197. echo  ║                                                                       ║
  198. echo  ║     Sorry, that is not a valid selection.                             ║
  199. goto AGAIN2
  200. :DONE
  201. LOCATE 20,00
  202. :QUIT
  203.  
  204.